home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / ctlpuz_1 / modapi.bas < prev    next >
BASIC Source File  |  1997-10-24  |  629b  |  19 lines

  1. Attribute VB_Name = "modAPI"
  2. Option Explicit
  3.  
  4. Public Declare Function CreateEllipticRgn Lib "gdi32" _
  5.     (ByVal X1 As Long, ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long
  6.  
  7. Public Declare Function SetWindowRgn Lib "user32" _
  8.     (ByVal hWnd As Long, ByVal hRgn As Long, ByVal bRedraw As Long) As Long
  9.  
  10. Public Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" _
  11.     (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
  12.  
  13. Public Const SND_SYNC = &H0
  14. Public Const SND_ASYNC = &H1
  15. Public Const SND_NODEFAULT = &H2
  16. Public Const SND_LOOP = &H8
  17. Public Const SND_NOSTOP = &H10
  18.  
  19.